home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
jaz_clib.arc
/
PUSHDIR.DMO
< prev
next >
Wrap
Text File
|
1989-04-09
|
455b
|
24 lines
#include <pushpop.h>
main()
{
char wpath[STKRECSIZE]; /* hold the path to push */
int whandle;
if ((whandle = jzopnfil(FNAME,2)) == -1)
whandle = jzcrtfil(FNAME,0); /* create if not exist */
jzsekfil(whandle,0L,2); /* seek to endof file */
memset(wpath,0,STKRECSIZE); /* init to null */
jzgetdr(wpath); /* get current subdirectory */
jzwrtfil(whandle,wpath,STKRECSIZE);
jzclsfil(whandle);
}